F 8 8 K *ClassTbl* *ClassEntry* *PTABLE* *WINDOWSEG* *ICONRESTAB* *ICONRESSEG* *ICONRES* Background *OBJTABLE* *IDTABLE* *NAMETAB* Rectangle Ellipse RoundedRectangle Polygon IrregularPolygon AngledLine Curve PaintObject Picture Hotword *RHOTWORD* Group Stage Button Viewer ComboBox Field RecordField *TbxBase* & oup 8 UTOSEGMENT* UTOSEGMENT* &File &Open... Ctrl+O &Save Ctrl+S Save &As... saveas &Import... import &Export... export Print Set&up... printsetup &Print Pages... Ctrl+P printpages Prin&t Report... printreport Send &Mail... sendmail &Run... E&xit Alt+F4 &Edit &Undo Ctrl+Z Cu&t Ctrl+X &Copy Ctrl+C &Paste Ctrl+V paste C&lear Del clear Select &All Shift+F9 selectall Select Pa&ge Shift+F12 selectpage &Size to Page F11 sizetopage F&ind... F5 Re&place... replace Aut&hor F3 author &Text &Character... F6 character &Paragraph... F7 paragraph &Regular Ctrl+Space regular &Bold Ctrl+B &Italic Ctrl+I italic &Underline Ctrl+U underline Stri&keout Ctrl+K strikeout Superscrip&t/Subscript superscriptSubscript &Normal Script normalscript Su&bscript Ctrl+L subscript Su&perscript Ctrl+Shift+L superscript &Show Hotwords F9 showhotwords &Page &Next Alt+Right &Previous Alt+Left previous &First Alt+Up first &Last Alt+Down &Back Shift+F2 &History... Ctrl+F2 history N&ew Page Ctrl+N newpage &Help &Contents F1 contents Status &Bar F12 statusbar erlink" if "Add" asym_addAnswerHyperlink tbk_DoHyperlink _tbk_hyperlinkCandidates buttonClick buttonClick false _tbk_ExecHyperlink tbk_HasHyperlinks _asym_hyperlinks tbk_DoHyperlink _asym_hyperlinks _tbk_HyperlinkCandidates ,"J," false Itbk_PopupPage asym_resetCursor cursN _tbk_HyperlinkLinkInfo tbk_GoToPage _tbk_ExecHyperLink tbk_FindHyperPage pgRef false C6_tbk_HyperlinkIRow _tbk_HyperlinkLinkInfo l_tbk_PopupPage tbk_PopupPage C6_tbk_HyperlinkIRow false A_tbk_AddLinkToArray tbk_HasHyperlinks _asym_hyperlinks _asym_hyperlinks _tbk_AddHyperlink tbk_HasHyperlinks _asym_hyperlinks tbk_getHyperlinks itemOffset tbk_itemOffset the list of directories stored in the tbk_HyperPath property &B. Store Directory in Hyperlink B. Store the directory with the book file name won't be able to move the books around without breaking >tbk_Container fName in the hyperlink. This makes the link faster but you that will be searched automatically. You can: to find the destination book even if you move the books false thisBook of this book. to a different configuration directory, simply by changing the link. destBook V_SetHyperPath Mtbk_MakeIntoRelPath ,,,, HshortFileName Mtbk_HyperPath hyperPath 5tbk_altPgName relPath pathOfFile mqtbk_itemOffset The destination book is not in a directory to search automatically. This will make it possible A. Add the destination directory to the current book's list of directories tb40dlg.dll \ tbk_nameOrID &A. Add Directory to Search Path thisPath destPath tbk_FindPathFile _tbk_AddLinkToArray >tbk_Container bkName tbk_CurrentDirectory _asym_HyperPath deftag Mtbk_MakeIntoRelPath pathOfFile BookDir thePath tbk_RelativePath _SetHyperPath tbk_FindHyperPage _tbk_BadLinksList C6_tbk_HyperlinkIRow _tbk_ClearHyperlinkFromArray false tbk_HasHyperlinks _asym_hyperlinks _asym_hyperlinks _tbk_ClearHyperlinkFromArray _tbk_ClearHyperlink >tbk_Container hotword button _AutoCloseCheck s_tbk_popViewers HorizontalDisplayRes >tbk_Container There are no Viewers available. false sysMenu lScreenFromPage 9VerticalDisplayRes TB40win.dll thinCaption asym_resetCursor magicName tbk_TempViewer vtemp jtbk_CloseOnEsc thick autoClose Do not rename me ScreenFromPage , UAddLg VerticalDisplayRes HorizontalDisplayRes shadow _tbk_PopupPage transPt false _tbk_sysCursor transPt oldPg pgRef false transfx oldCurs asym_resetCursor page id %sysMousePosition% tbk_GoToPage .'+ +F asym_resetCursor pathOfFile Mtbk_HyperPath tbk_FindPathFile tbk_FindHyperPage _tbk_HyperlinkIRow .', #? pgCaption title tbk_AltPgName groupfieldrecordfieldpagebackgroundbook of book tbk_Container pathOfFile tbk_MakeIntoRelPath shortFileName >tbk_Container jtbk_Trim tbk_CurrentDirectory pathOfFile itemOffset tbk_itemOffset , TX" /-# mqtbk_itemOffset tb40dlg.dll _asym_HyperPath tbk_HyperPath V_SetHyperPath Hyperlinking tbk_HyperPath tbk_IsFile TB40DOS.DLL DOSPath GetDosEnvironmentString false jtbk_trim I4GetDosEnvironmentString pathOfFile tbk_ExpandRelPath testName bkPath tbk_FindPathFile w, #> vGetCurrentDirectory GetCurrentDrive TB40DOS.dll GetCurrentDrive GetCurrentDirectory X"/g tbk_CurrentDirectory tbk_CurrentDirectory tbk_CurrentPath tbk_FindPage _asym_hyperlinks tbk_HasHyperlinks FileExists FileExists TB40dos.dll tbk_IsFile .', #? tbk_NameOrID tbk_trim oldse _tbk_SysCursor buttonClick loc LOCAL hyperlinks[][] candidates[] asym_addAnswerHyperlink(); -- test CBT Edtion, NULL xpresent obj = _tbk_hyperlinkCandidates( tbk_DoHyperlink( i], " , triggerName tbk_HasHyperlinks( = _asym_hyperlinks _tbk_ExecHyperlink( _tbk_HyperlinkCandidates obj, Hreference WORD n n] = _tbk_ExecHyperLink , linkName _tbk_HyperlinkLinkInfo( cursN = isType(" "> 0 *<= 44 tbk_PopupPage( tbk_GoToPage( asym_resetCursor , resolv i = _tbk_HyperlinkIRow( i = 0 i][2] & i][3]) = i][2] "<" -- keyword ~ <> pgRef = tbk_FindHyperPage ( i][3], [i][4]) i][3], [i][4]) i][5], i][6], i][7], i][8], i][9] "OK", i][3], i][4] "BAD", i][2], i][3], [i][4] , popStyle, pos, captn, _tbk_PopupPage( .tn, _tbk_AddHyperlink , transFx, linkType, i = i = 0 i = dimensions( ) + 1 i = 1 i][1] = _tbk_AddLinkToArray(hyperLinks, i, tbk_getHyperlinks LInfo n = i][9] i][7] i][6] i][4] i][3] i][2] i][1] hLInfo = & CRLF iRow, --** HCO 940727 linkDLL "tb40dlg.dll" INT tbk_itemOffset = (STRING, .>") > 0 ][2] = ][3] = ][4] = ][2] = tbk_nameOrID( ][3] = tbk_altPgName( thisBook = destBook = tbk_Container( ][4] = fName = destPath = pathOfFile( thisPath = "c:\" "c:\x\" relPath = tbk_MakeIntoRelPath( shortFileName( hyperPath = tbk_HyperPath( inPath = (tbk_FindPathFile( B) <> "The destination a directory"\ && "that will be searched automatically. You can:"\ && "A. Add the current 8's list directories"\ nThis possible"\ find 8even mbooks"\ a different configuration , simply Hchanging"\ stored property"\ & "B. Store 8file makes faster but && "won't be able around without breaking"\ f"&A. Directory Search "&B. "Add" _SetHyperPath ][4] = ][6] = ][7] = ][9] = bk, what bk <> bk = bk = bk = bkName = BookDir = tbk_CurrentDirectory() deftag = "< tagLen = BookDirLen = dir = <> "\" @bookDir +) = 1 ) = 1 taglen thePath = tbk_RelativePath( *<> dir thepath _asym_HyperPath _tbk_BadLinksList --** HCO 940727 stack badLinks [i][2] <> [i][2], i,3], i][4]) = i][1] _tbk_ClearHyperlinkFromArray newLinks[][] ,i,j,k n = i = IsAnsArray = ( ) > 10) (i > 0 (n = 1 i = 1) -- special Mbecause array assignment bug i][j] = i > 0 j][k] = j][k] n - 1 j][k] = j+1][k] = newlinks 1][2] <> ) <= 10 ) = 1 1][2] = _AutoCloseCheck loc v = . = mousePosition objectFromPoint( {oldPg oldCurs pos = maxPopups = 5 --** MAGIC NUMBER magicName = "Do xrename me" myBk = ss = (s_tbk_popViewers) >= isOpen = TRUE parentHandle close v = ss; -- available vtemp = && i) vTemp "There tbk_TempViewer style v = "sysMenu" imageBuffers v = 1 alwaysReader captionBar tbk_CloseOnEsc c"autoClose" c"shadow" c"thick" v = "thickFrame" c"thinCaption" v = "thinFrame" v = " v = " v = dialogFrame ss = --** DEBUG X"TB40win. ScreenFromPage( VerticalDisplayRes() HorizontalDisplayRes() -- place mouseclick --defaultPosition v = " pageUnitsToScreen( , targetWindow) windowHandle ',pageScroll =, pos) defaultPage x2 > s() - x2,0 y2 > ) - y2 x1 < 0 H-x1,0 y1 < 0 H0,-y1 -- sharedScript " tbk_container( , transfx, ss= = _tbk_sysCursor() <> " p = p > 0 transPt = Vp + 4 transition pgName, logical ss , destbk refString "<" -- pg = bk = ss = bk <> bk = 8) & bk) bk = bk = "ID" DWORD, " && " && isObject( -- "ID" ) = 2 AltPgName) n = "i][1] = tbk_AltPgName title pgCaption "ID" && !objType ~#nextObj wCnt = #"BOOK" WCnt "groupfieldrecordfieldpagebackgroundbook" p = p > 0 Vp+4 Obj = U(fn) rootPath,longPath ) = 1 p1 = 1;p2 = p1 cp2 < p2 > 0 dirlen = p2 - p1 p2 - 1 p2 = p2 - p1 = p2 U(fn) Vi + 1 U(fn) result, bkPath, bk = bk = bk <> bk = bk <> tbk_Trim( ) > 0 "Hyperlinking" DOSPath = c":\" tbk_IsFile( d TB40DOS.DLL" G GetDosEnvironmentString( "PATH") p = ~("=", p > 0 p = ~(";", cp <> 0 = "," p = ~(";", tbk_trim( <> "\" tbk_ExpandRelPath( <> ":" testName = t" GetCurrentDrive() " GetCurrentDirectory( drv = "\" & <> "\" <& ":" & tbk_CurrentPath tbk_FindPage pgN ss = * obj ss = FileExists( $TB40dos. tbk_NameOrID "ID" && cs <> s <= SPACE cs <> s <= _tbk_SysCursor ;oldse= r;oldsen=sysErrorNumber +real", popup viewer itemOffset tbk_itemOffset mqtbk_itemOffset tb40dlg.dll stbk_popViewers closeWindow closeWindow SYSTEM stbk_popViewers linkDLL "tb40dlg.dll" INT tbk_itemOffset = (STRING, :HDMEDIAPATH MS Sans Serif info_LastSaved 1/4/96 1:01:57 PM MS Sans Serif Arial info_LastSavedBy 1/4/96 1:01:46 PM Asymetrix Corporation ASYM_TempViewer Do not rename me 1 "D:\FOO.TBK" Page id 6 of Book "G:\MTB40\CTB40R.SBK" SYM_itemOffset closeWindow closeWindow SYSTEM stbk_popViewers ASYM_itemOffset( ASYM_TempViewer ASYM_CloseOnEsc Do not rename me 2 ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK" stbk_popViewers ASYM_itemOffset closeWindow closeWindow SYSTEM stbk_popViewers ASYM_itemOffset( ASYM_TempViewer ASYM_CloseOnEsc Do not rename me 3 ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK" stbk_popViewers ASYM_itemOffset closeWindow closeWindow SYSTEM stbk_popViewers ASYM_itemOffset( ASYM_TempViewer ASYM_CloseOnEsc Do not rename me 4 ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK" stbk_popViewers ASYM_itemOffset closeWindow closeWindow SYSTEM stbk_popViewers ASYM_itemOffset( ASYM_TempViewer ASYM_CloseOnEsc Do not rename me 5 ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK" stbk_popViewers ASYM_itemOffset closeWindow closeWindow SYSTEM stbk_popViewers ASYM_itemOffset( ASYM_TempViewer ASYM_CloseOnEsc Do not rename me 6 ge id 82 of Book "G:\FRANKJR\TUTORIAL\CBTTOUR.TBK" stbk_popViewers ASYM_itemOffset closeWindow closeWindow SYSTEM stbk_popViewers ASYM_itemOffset( ASYM_CloseOnEsc Do not rename me 7 tbk_TempViewer tbk_CloseOnEsc stbk_popViewers ASYM_itemOffset closeWindow closeWindow SYSTEM stbk_popViewers ASYM_itemOffset( ASYM_TempViewer ASYM_CloseOnEsc buttonclick buttonclick Script ToolBook 4.0 - Runtime HyperLink SysBookknk SysBookBook Copyright 1995 Asymetrix Corporation 951205160027559914889115254 ASYM_TpID